home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / class / lookupky.c < prev    next >
C/C++ Source or Header  |  1997-04-16  |  3KB  |  147 lines
  1.  
  2.  
  3. /*  Copyright (c) 1993-1996 Algorithms Corporation  */
  4. /*  All rights reserved.  */
  5.  
  6.  
  7.  
  8.  
  9. /*  This file automatically generated by dpp - do not edit  */
  10.  
  11. #define    DPP_STRATEGY    2
  12. #define    DPP_FASTWIDE    0
  13.  
  14.  
  15.  
  16.  
  17. #define    CLASS    LookupKey_c
  18. #define    ivType    LookupKey_iv_t
  19.  
  20. #include "generics.h"
  21.  
  22. object    LookupKey_c;
  23.  
  24.  
  25. #line 26 "lookupky.c"
  26. typedef struct  _LookupKey_iv_t  {
  27.     object iKey;
  28. }    LookupKey_iv_t;
  29.  
  30.  
  31.  
  32. #line 19 "lookupky.d"
  33. cmeth objrtn LookupKey_cm_gNewWithObj(object self, object key)
  34. { 
  35.     object luk; 
  36.     ivType *iv; 
  37.  
  38.     ChkArgNul(key, 2); 
  39.     luk = oSuper(LookupKey_c, gNew, self)(self); 
  40.     iv = ivPtr(luk); 
  41.     iv->iKey = key; 
  42.     return luk; 
  43. } 
  44.  
  45. imeth objrtn LookupKey_im_gDeepCopy(object self)
  46. { LookupKey_iv_t *iv = GetIVs(LookupKey, self);
  47.     object nobj; 
  48.     ivType *niv; 
  49.  
  50.     nobj = oSuper(LookupKey_c, gDeepCopy, self)(self); 
  51.     niv = ivPtr(nobj); 
  52.     if (niv->iKey) 
  53.         niv->iKey = gDeepCopy(iv->iKey); 
  54.     return nobj; 
  55. } 
  56.  
  57. imeth objrtn LookupKey_im_gKey(object self)
  58. { LookupKey_iv_t *iv = GetIVs(LookupKey, self);
  59.     return iv->iKey; 
  60. } 
  61.  
  62. imeth objrtn LookupKey_im_gChangeKey(object self, object key)
  63. { LookupKey_iv_t *iv = GetIVs(LookupKey, self);
  64.     object old; 
  65.     ChkArgNul(key, 2); 
  66.     old = iv->iKey; 
  67.     iv->iKey = key; 
  68.     return old; 
  69. } 
  70.  
  71. imeth objrtn LookupKey_im_gDeepDispose(object self)
  72. { LookupKey_iv_t *iv = GetIVs(LookupKey, self);
  73.     if (iv->iKey) 
  74.         gDeepDispose(iv->iKey); 
  75.     return oSuper(LookupKey_c, gDispose, self)(self); 
  76. } 
  77.  
  78. imeth objrtn LookupKey_im_gStringRepValue(object self)
  79. { LookupKey_iv_t *iv = GetIVs(LookupKey, self);
  80.     return iv->iKey ? gStringRepValue(iv->iKey) : gNew(String); 
  81. } 
  82.  
  83. imeth int LookupKey_im_gHash(object self)
  84. { LookupKey_iv_t *iv = GetIVs(LookupKey, self);
  85.     return iv->iKey ? gHash(iv->iKey) : 0; 
  86. } 
  87.  
  88. imeth int LookupKey_im_gCompare(object self, object arg)
  89. { LookupKey_iv_t *iv = GetIVs(LookupKey, self);
  90.     ChkArgNul(arg, 2); 
  91.     if (!iv->iKey && !arg) 
  92.         return 0; 
  93.     if (!iv->iKey) 
  94.         return -1; 
  95.     if (!arg) 
  96.         return 1; 
  97.     return gCompare(iv->iKey, gKey(arg)); 
  98. } 
  99.  
  100.  
  101. #line 102 "lookupky.c"
  102.  
  103. objrtn    LookupKey_initialize(void)
  104. {
  105.     static  CRITICALSECTION  cs;
  106.     static  int volatile once = 0;
  107.  
  108.     ENTERCRITICALSECTION(_CI_CS_);
  109.     if (!once) {
  110.         INITIALIZECRITICALSECTION(cs);
  111.         once = 1;
  112.     }
  113.     LEAVECRITICALSECTION(_CI_CS_);
  114.  
  115.     ENTERCRITICALSECTION(cs);
  116.  
  117.     if (LookupKey_c) {
  118.         LEAVECRITICALSECTION(cs);
  119.         return LookupKey_c;
  120.     }
  121.     INHIBIT_THREADER;
  122.     Association_initialize();
  123.     if (LookupKey_c)  {
  124.         ENABLE_THREADER;
  125.         LEAVECRITICALSECTION(cs);
  126.         return LookupKey_c;
  127.     }
  128.     LookupKey_c = gNewClass(Class, "LookupKey", sizeof(LookupKey_iv_t), 0, Association, END);
  129.     cMethodFor(LookupKey, gNewWithObj, LookupKey_cm_gNewWithObj);
  130.     iMethodFor(LookupKey, gCompare, LookupKey_im_gCompare);
  131.     iMethodFor(LookupKey, gChangeKey, LookupKey_im_gChangeKey);
  132.     iMethodFor(LookupKey, gKey, LookupKey_im_gKey);
  133.     iMethodFor(LookupKey, gStringRepValue, LookupKey_im_gStringRepValue);
  134.     iMethodFor(LookupKey, gHash, LookupKey_im_gHash);
  135.     iMethodFor(LookupKey, gDeepDispose, LookupKey_im_gDeepDispose);
  136.     iMethodFor(LookupKey, gDeepCopy, LookupKey_im_gDeepCopy);
  137.  
  138.     ENABLE_THREADER;
  139.  
  140.     LEAVECRITICALSECTION(cs);
  141.  
  142.     return LookupKey_c;
  143. }
  144.  
  145.  
  146.  
  147.